www.gusucode.com > 星梦奇缘交友网 1 > 星梦奇缘交友网 1.0源码程序/love/links/open.asp

    <%@ Language=VBScript %>
<!--#INCLUDE FILE="conn.asp" -->
<%url=request("url")
Set rs = Server.CreateObject("ADODB.Recordset")
sql="update link set hits=hits+1 where id="&request("id")
rs.open sql,connlink,1,3
response.redirect "" & url
rs.close
set rs=nothing
conn.close
set conn=nothing
%>